home *** CD-ROM | disk | FTP | other *** search
/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_xemacs.idb / usr / freeware / lib / xemacs-20.4 / lisp / efs / efs-auto.el.z / efs-auto.el
Encoding:
Text File  |  1998-05-21  |  2.1 KB  |  58 lines
  1. ;; -*-Emacs-Lisp-*-
  2. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  3. ;;
  4. ;; File:         efs-auto.el
  5. ;; Release:      $efs release: 1.15 $
  6. ;; Version:      #Revision: 1.8 $
  7. ;; RCS:          
  8. ;; Description:  Simple way of autoloading efs
  9. ;; Author:       Andy Norman, Dawn
  10. ;; Created:      Thu Sep 24 09:50:08 1992
  11. ;; Language:     Emacs-Lisp
  12. ;;
  13. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  14.  
  15. ;;; This file is part of efs. See efs.el for copyright
  16. ;;; (it's copylefted) and warrranty (there isn't one) information.
  17.   
  18. ;;; Provides a way of autoloading efs. To use this, just put
  19. ;;; (require 'efs-auto) in your .emacs file.
  20. ;;;
  21. ;;; The Bad News:
  22. ;;; 
  23. ;;; 1. Calls to load and require will not trigger efs to autoload.
  24. ;;;    If you are want to put remote directories in your load path,
  25. ;;;    you should require efs.
  26. ;;; 2. Because efs does not overload expand-file-name until it is loaded,
  27. ;;;    "smart" expansion of file names on remote apollos running domain
  28. ;;;    will not work yet.  This means that accessing a file on a remote
  29. ;;;    apollo may not correctly cause efs to autoload. This will depend
  30. ;;;    the details of your command sequence.
  31.  
  32. (provide 'efs-auto)
  33. (require 'efs-ovwrt)
  34. (require 'efs-fnh)
  35.  
  36. (defconst efs-auto-version
  37.   (concat (substring "$efs release: 1.15 $" 14 -2)
  38.       "/"
  39.       (substring "#Revision: 1.8 $" 11 -2)))
  40.  
  41. ;;; Interactive functions that should be accessible from here.
  42.  
  43. (autoload 'efs-report-bug "efs-report" "Submit a bug report for efs." t)
  44. (autoload
  45.  'efs-set-passwd "efs-netrc"
  46.  "For a given HOST and USER, set or change the associated PASSWORD." t)
  47. (autoload 'efs-nslookup-host "efs"
  48.       "Attempt to resolve a hostname using nslookup if possible." t)
  49. (autoload 'efs-display-ftp-activity "efs"
  50.   "Displays the number of active background ftp sessions in the modeline.
  51. Uses the variable `efs-mode-line-format' to determine how this will be
  52. displayed." t)
  53. (autoload 'efs-ftp-path "efs-cu"
  54.   "Parse PATH according to efs-path-regexp.
  55. Returns a list (HOST USER PATH), or nil if PATH does not match the format.")
  56.  
  57. ;;; end of efs-auto.el
  58.